home *** CD-ROM | disk | FTP | other *** search
- {$ifndef EXEC_DEVICES_H}
- CONST EXEC_DEVICES_H=0;
- {$ifndef EXEC_LIBRARIES_H;incl"exec/libraries.h";endif}
- {$ifndef EXEC_PORTS_H;incl"exec/ports.h";endif}
- TYPE p_Device = ^Device;
- Device = record
- dd_Library:_Library
- end;
- p_Unit = ^Unit;
- Unit = record
- unit_MsgPort: MsgPort;
- unit_flags,unit_pad: Byte;
- unit_OpenCnt: Word
- end;
- CONST UNITF_ACTIVE = $1;
- UNITF_INTASK = $2;
- {$endif}
- {$ifndef EXEC_DEVICES_LIB}
- Const EXEC_DEVICES_LIB=0;
- Library SysBase:
- -432: Procedure AddDevice(a1: p_Device);
- -438: Procedure RemDevice(a1: p_Device);
- -444: Function OpenDevice(a0: stryng; d0: Long; a1: Ptr; d1: Long): Long;
- -450: Procedure CloseDevice(a1: Ptr)
- end;
- {$endif}
-